<i ATTLIST query question CDATA #REQUIRbU 
<i ELEMENT reaction (setpomts | queryF 
<!ELEMENT setpoints EMPTY> _ ^q^^ 
<! ATTLIST setpoints points NMlUKJirs jhm^v 

it<:„ 1 



<9xml version-' 1.0"?> 
< DOCTYPE query SYSTEM "query.dtd > 
< q uery questional* Paris the Capital of France. 
<setpointspomts=10> 
<query question^' Are you sure? > 
<setpoints points-0> 

<setpoints points=l> 



</query> 
</query> 



Fig. 2 
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<!ELEMENT (reaction, reaction, query?) > 

<!ATTLIST Q Ue, T question CDATA #REQUIRED > 



SI -reaction 



I - '-^ask^ 



answer = 'no 



JL 



S-query 

1 



S2-reaction 



@ask: 



print(question); answer := get(stdin) 



DTD fragment 



visual description of 
control flow 



transition rule 
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<!ELEMENT r „ ar#ion (setpoints | query) > 
<!ATTLIST reaCtl ° D > 



<!ELEMENT setDoints > 
<!ATTLIST sc 4""«» points NMTOKEN #REQUIRED 




answer = y_es" _ 



*■ Si -reach on 



S-query 
1 



answer = no 



- k S2 -reaction 




S 1 -reactior/ \S2-reaction 

® 




answer = "yes" 
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<!element module (derived*, expression?, state*, module*> 

<!attlist module name CDATA #REQUIRED 

number CD ATA " 1 "> 

<!element derived (argument*, expression)> 

<!attlist derived name CDATA> 

<! element argument EMPTY> 

<!attlist argument name CDATA> 

<!element state (action*, transition*)> 

<!attlist state name CDATA> 

<!element transition (expression, path)> 

<! element path (component?)> 

<!attlist path state CDATA "initials 

<! element component (component?)> 

<!attlist component name CDATA #REQUIRED 
number CDATA 'T r > 

<! element expression (path | self | src | trg | evalattr j getfirst j 

getnext | parent | root | apply | external ) constant> 
<!element action (setattr | ifthen | forall | extemal)> 
<!element src EMPTY> 
<!element trg EMPTY> 
<!element self EMPTY> 
<! element evalattr (expression?)> 
<!attlist evalattr attribute CDATA #REQUIRED> 
<! element getfirst (expression?)> 
<!attlist getfirst attribute CDATA #REQUIRED> 
<! element getnext (expression?)> 
<!element parent (expression?)> 
<!element root EMPTY> 
<!element apply (expression, expression ?)> 
<!attlist apply op CDATA #REQUIRED> 
<!element external (expression*)> 
<!attlist external name CDATA 

language CDATA > 
<!element constant EMPTY> 
<!attlist constant value CDATA #REQUERED> 
<!element setAttr (expression?, expression)> 
<!attlist setAttr attribute CDATA #REQUIRED> 
<!element ifthenelse (expression, action*)> 
<!element forall (action*)> 
<!attlist forall range CDATA "all-elements" 
variable CDATA> 



Fig. 9 



[F1.S1] 

cur := getRef("doc.xml") 



[F1.S2] 
mod := 

getRef( ,, module ,, +cur.getLabel+ M .xml") 



[F2.S1] 

reference to F2.S1 



false 



[F2.S99] 

reference to F2.S99 








[F3.S1] 

reference to F3.S1 






[F3.S99] 

reference to F3.S99 








[F1.S3] 

cur := cur.traverse 






[F5] 

reference 


to F5 






[F6] 

reference to F6 






[F7.S1] 

reference to F7.S1 
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F1 S1 sets the global variable cur to a root reference. 



F1 S2 sets the global variable mod to refer to the module 
element corresponding to cur, setting the attribute origin of 
all state and derived elements to cur. 



▼ 

F2 copies all state and derived elements from the module 
mod into the element cur. 



t 



F3 and F4 copy the 
submodules of mod 
element cur. 


state and derived elements of the 
into the corresponding components of 


1 


r 



Update cur to cur.traverse 




F7 executes the XML document 
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[F2.S1] 

state := mod.getFirst("state") 




[F2.S2] 

state.setAttr("origin", cur) 



[F2.S3] 

state .- state.getNext 



[F2.S4] 

derived := mod.getFirst("derived") 




[F2.S5] 

derived.setAttr("origin", cur) 



[F2.S6] 

derived := derived.getNext 



[F2.S7] 

cur.pasteInside(mod.copyList("derived")) 








[F2.S99] 

cur.pasteInside(mod.copyList("state")) 





Fig. 11 



[F3.S1] 

submod := mod.getFirst("module") 




Fig. 12 



[F4.S1] 

state := submod,getFirst("state") 




[F4.S4] 

derived := submod.getFirst("derived") 



true 



[F4.S2] 

state.setAttr("origin", cur) 




[F4.S5] 

derived.setAttrC'origin", cur) 



[F4.S3] 

state := state.getNext 



[F4.S6] 

derived := derived.getNext 



[F4.S7] 

subcur.pasteInside(submod.copyList("derived")) 










[F4.S99] 

subcur.pasteInside(submod.copyList("state")) 





Fig. 13 



[F8.S1] 




reference to F8.S1 






true 



[F7.S1] 

cur := cur.getRoot 




[F7.S2] 

curstate := "initial" 



[F7.S3] 

state := cur.getFirst("state") 



[F7.S9] 

state := state.getNext 




true 



[F7.S4] 

cur:= state.evalAttr("origm") 



[F7.S5] 

action := state.getFirst("action") 



[F7.S8] 

cur := state.parent 



[F7.S7] 

action := action. getNext 




[F7.S6] 

execute(action) 



false 
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[F8.S5] 

trans := state.getFirst("transition") 






[F8.S1] 
src := cur 








[F8.S2] 

state := cur.getFirst("state") 







[F8.S9] 

state := state. getNext 



[F8.S8] 

trans := trans.getNext 



[F7.S3] 

reference to F7.S3 






curstate := 
trans.getFirst("path 


[F8.S8] 
").evalAttr("state") 




[F8.S6] 

trg := evaluate(trans.getFirst("path")) 
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moduiequery.xml: 
<module name- 'query "> 

<state name-'initiar> 

<transition> <path state="ask7> </transition> 

<7state> 

<state name="ask lt > 
<action> 

<external name="print" language="sheil"> 

<expression> <attreval name- 'question 1 ^ </expression> 
</external> 

</action> 
<action> 

<setattr name="answer M > 

<expression> <se!f/> </expression> 
<expression> 

<extemal name="get(stdin)" Ianguage= H sheU n > </external> 
</expression> 

</setattr> 

</action> 
<transition> 

<expression> 

<apply op='-"> 

<expression> <attrevai name="answer7> </expression> 
<expression> <constant value- 'yes7> </expression> 

</apply> 
</expression> 

<path> <component name-'reaction" number=" 1 7></path> 
</transition> 
<transition> 

<expression> 

<apply op=' 

<expression> <attreval name="answer7> </expression> 
<expression> <constant value~"no7> </expression> 

</apply> 
</expression> 

<path> <component name=' f reaction" number="27> </path> 
</transition> 
<module name- 'action" number^'T^ 
<state name= ,, terminal"> 

<transition> <path> <component name- 'query fr > </path> </transition> 

</state> 
</module> 

<moduie name~"action" number="2"> 
<state name="terminar> 

<transitionxpath> <component name- 'query^ </pathx/transitton> 

</state> 
</moduie> 

<module name- 'query"> 

<state name="terminar'> 

<transition> <path name- 'terminar^ </transition> 

</state> 
</module> 
</module> 



Fig. 16 



module reaction.xml: 
<modu!e name= "reaction "> 

<state name- 'initial'^ 
<transition> 

<expression> 

<apply op="!="> 

<expression> <getfirst name="setpoints"/> </expression> 
<expression> <constant va]ue="undef *> </expression> 

</apply> 
</expression> 

<path> <component name="setpoints , 7> </path> 
</transition> 
<transition> 

<expression> 

<applyop="!="> 

<expression> <getfirst name- f query7> </expression> 
<expression> <constant value="undef '> </expression> 

</app!y> 
</expression> 

<path> <component name= ,, query'V> </path> 
</transition> 

</state> 

<modu!e name- 'setpoints"> 

<state name- 'terminal*^ <transition> <path state^'terminal "/> </transition> </state> 
</module> 

<module name- 'query"> 

<state name="termina]"> <transition> <path state- 'terminal7> </transition> </state> 
</module> 
</moduie> 

Fig. 17 

module setpoints.xml: 
<module name- 'setpoints 1 ^ 

<state name="initiai"> 

<transition> <path state- 'set7> </transition> 

</state> 

<state name="set M > 
<action> 

<setattr name-'PointCounter , *> 

<expression> <getroot/> </expression> 
<expression> 

<appiy op="+"> 

<expression> 

<getattr name^TointCounter'^ 

<expression> <getroot/> </expression> 

</getattr> 
</expression> 

<expression> <getattr name="points7> </expression> 

</apply> 
</expression> 

</setattr> 

</action> 

<transition> <path state= ,, terminai ,f /> </transition> 

</state> 
</module> 



Fig. 18 
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